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cont a, b ; 

cont s i n (cont x) ; 

a=0; 
b=0; 

always { 
b' =0.2; 
a' =sin(b) ; 

} 

samp I e (a) ; 
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class DCML_Class 
{ 

pub I i c cont m_a ; 
DCML_Class(cont a) { 

m_a = a; 

m_a' = 0. 01 ; 

} 

def { 
do { 




} 



always m_a"+ (1/4) * m_a' +0. 03 * m_a = 1/2; 
} watch i ng (m_a' = 0) ; 

when(m_a' = 0) always {m_a' = 0; } 



} 

DCML_Class app1 (1) ; 
sample (appl. m_a) ; 
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cont time; 
time = 0; 

always {time' = 1 ;} 
class Motor 
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Motor (cont i n i t_va I , cont acc_end, cont end) { 
val_ =init_val; 
acc_end_ =acc_end ; 
end_ =end; 

} 

pub I ic event go_; 
private cont end_, acc_end_; 
pub I i c cont va I _, star t_t i me_ ; 
def { 

always {endj = 0;acc_end_' = 0;start_time_' =0;} 
do {always valj = 0; } watching(go J: 
when (go _)start_time_ = time; 
when (go J always { 

do {always val _' =4;} watching (time=start_time_+acc_end_) ; 
when (t i me=star t_t i me_+acc_end J 

do {always val_' =0;} watching (time=start_time_+endj 
when (time = start_time_+end J always val_ = 0; 

. 1 



}; 



class Paper 

pub I ic cont val_, pos_; 
def { 

pos_ =0; 
^ always pos_' = val * 0.075; 

1 • 



always paper. val_ = motor1.val_; 
when (t i me = 10) motor 1 . go_ ; 
when (t i me = 70) motor 1 . go_ ; 

Paper paper; 

Motor motor 1 (5.0. 10. .25.) ; 

sample (motor 1. val_) ; 
sample (paper, pos J ; 
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